proc bot:joininmucs { } {
global bot name
set a "bot:joininmucs"
set con [config::conferenceslist]
	for {set cc [llength $con]} {$cc>0} {set cc [expr $cc-1]} {
		::debug $a cc== $cc
		set to [lindex $con $cc]
		::debug "$a" to= "$to"
		set out "<presence to='$to/$name(def)' xml:lang='ru'><status>$bot(version)</status><x xmlns='http://jabber.org/protocol/muc'><history maxchars='0' maxstanzas='0'/></x></presence>"
		set name($to) "$name(def)"
		::debug $a "set name($to) as" "$name(def)"
		jlib::outmsg $out
	}
}
